/*
 * Peralta Santa Anna Victor Miguel
 * Diciembre 2011
 * Stored Procedure:
 *
 * Añadimos un nuevo correo
 */

CREATE OR REPLACE FUNCTION addCorreo
	(
		nidusuario 			INTEGER,
 		scorreo           	VARCHAR
		
	) RETURNS INTEGER AS $$
	
	DECLARE llave INTEGER;
	
	BEGIN
	
		INSERT INTO CORREOS ( nidusuario, scorreo )
		
		VALUES ( nidusuario, scorreo )
		
		RETURNING nIdCorreo INTO llave;
		
		RETURN llave;
		
		COMMIT;
		
	END;
	
$$ LANGUAGE plpgsql;

--select addCorreo( 3, 'v1ctor@ciencias.unam.mx' );

